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FOREWORD 


The  activities  described  in  this  report  in  modifying  the 
Dynamic  SAM  Model  to  include  an  endgame  capability  were 
performed  during  the  period  July  1976  to  September  1977 
under  Contract  N62269-76-C-0386  for  the  Naval  Air  Development 
Center,  Warminster,  Pennsylvania.  The  purpose  of  this  effort 
was  to  develop  a means  for  evaluating  kill  probabilities 
associated  with  trajectories  and  missile/aircraft  intercept 
conditions  generated  by  the  NADC  Dynamic  SAM  Model.  This 
is  the  second  of  two  volumes  constituting  the  final  report. 
The  work  was  performed  by  R.  H.  Rose,  M.  A.  Dloogatch,  and 
D.  S.  Kluk  of  the  Caywood-Sc'niller  Division  of  A.  T.  Kearney. 

This  volume  includes  instructions  for  preparing  inputs, 
sample  outputs,  program  listings  and  a glossary  of  FORTRAN 
variable  names. 
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SECTION  1 
INTRODUCTION 

As  a prerequisite  to  the  use  of  the  DSAMAM  model  with  the 
addition  of  an  endgame  capability  the  user  must  be  familiar 
with  the  input  requirements  for  the  basic  DSAMAM  program. 
These  requriemer.ts  are  covered  in  detail  in  Volume  II  of 
the  Final  Report  on  the  Dynamic  SAM- Air craft  Study,  Report 
Number  C9-2336/120,  Autonetics,  North  American  Rockwell  Corp . 
This  User's  Guide  will  confine  itself  to  the  additional  op- 
erating requirements  which  accompany  the  new  endgame  capa- 
bility . 


i 
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SECTION  2 
DATA  REQUIREMENTS 


There  are  twelve  sets  of  input  cards,  each  made  up  of  one  or 
more  cards,  which  comprise  the  new  inputs  to  the  DSAMAM  pro- 
gram. The  format  for  these  inputs  is  shown  on  the  forms  in 
Figure  2-1  and  each  set  is  discussed  below.  The  new  inputs 
are  inserted  in  the  data  for  the  old  DSAMAM  program  immedi- 
ately following  the  title  cards. 

All  inputs  other  than  the  control  parameters  are  read  in  as 
FORTRAN  real  variables . This  means  that  normally  they  should 
be  entered  with  an  explicitly  designated  decimal  point.  If 
they  are  entered  without  a decimal  point,  they  must  be  right- 
justified  and  the  implied  decimal  point  will  be  after  the 
rightmost  digit.  All  of  the  Cartesian  coordinates  requested 
on  the  input  forms  are  to  be  in  the  aircraft  body  coordinate 
system.  This  coordinate  system,  under  the  name  "stability 
coordinates,"  is  defined  on  page  3-22  of  the  Final  Report  on 
the  Dynamic  SAM-Aircraft  Study.  Because  in  the  basic  DSAMAM 
program  the  aircraft  is  essentially  considered  to  be  a single 
point,  the  location  of  the  origin  relative  to  the  components 
of  the  aircraft  is  not  specified  in  the  definition  of  the  co- 
ordinate system.  However,  since  the  endgame  addition  repre- 
sents the  aircraft  in  a variety  of  ways  (e.g.,  a set  of  points 
or  a set  of  ellispoids)  the  location  of  the  origin  must  be 
specified  for  the  aircraft  body  coordinate  system.  The  choice 
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is  arbitrary;  however,  the  user  will  probably  wish  the  point 
to  correspond  to  some  natural  feature  of  the  aircraft  (e.g., 
nose,  center  of  gravity,  pilot). 

2 . 1 Control  Parameters 

The  control  parameters  are  read  in  on  the  first  card  and 
define  the  number  of  cards  to  follow.  These  nine  parameters 
are  read  in  as  FORTRAN  integer  variables.  That  is,  the  num- 
bers must  be  right- justified  and  no  decimal  points  may  appear. 
The  definitions  of  each  of  the  parameters  appear  in  Section  5. 

The  control  parameters  are  limited  by  the  following  constraints: 

1 <_  NCOMPS  25* 

0 1 NDUBLY  _<  [NCOMPS/2] 

0 <_  NSHLDS  25 
0 <_  NBLAST  25 
0 <_  NDHNK  <25 

0 ^ NDHK  <_  NDHNK 

1 <_  NGLIT  <_  25 
1 <_  NLEVS  <_  4* 

1 <_  NVTS  <.10* 

where  the  symbol  []  is  read  "the  greatest  integer  less  than 
or  equal  to." 

2 . 2 Vulnerable  Component  Locations 

Vulnerable  component  locations  are  read  in,  one  to  a card, 
with  the  units  to  be  feet.  There  must  be  at  least  one  vulner- 


* These  limits  are  based  on  the  assumption  of  being  able  to 
utilize  300K  (octal)  of  computer  core.  If  less  core  is 
available,  one  or  more  of  these  numbers  must  be  reduced  (see 
discussion  of  vulnerable  area  inputs) . 
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able  component.  If  the  control  parameter  NDUBLY  is  greater 
than  zero,  then  the  first  NDUBLY  pairs  of  vulnerable  compo- 
nents are  assumed  to  be  doubly  vulnerable. 

2 . 3 Ellipsoids 

There  are  four  sets  of  ellipsoid  centroids  and  semi-axes. 

The  units  are  to  be  feet.  Each  card  contains  the  coordinates 
of  one  centroid  and  the  corresponding  semi-axes . Any  of 
these  sets  may  be  omitted  if  the  corresponding  control  para- 
meter is  zero.  If  there  are  no  direct-hit-no-kill-ellipsoids, 
then  there  can  be  nc  direct-hit-with-kill-ellipsoids . 

2 . 4 Glitter  Point  Locations 

Glitter  point  locations  are  read  in,  one  to  a card,  with  the 
units  to  be  feet.  At  least  one  glitter  point  must  be  present. 

2 . 5 Vulnerable  Area  Tables 

The  vulnerable  area  tables  are  the  most  extensive  and  compli- 
cated set  of  inputs.  The  nesting  of  these  cards  is  shown  on 
the  second  page  of  Figure  2-1.  The  outermost  level  of  nesting 
is  by  kill  level.  All  cards  for  each  kill  level  are  grouped 
together.  The  second  level  of  nesting  is  by  vulnerable  com- 
ponent. Within  a particular  kill  level  all  cards  for  each 
vulnerable  component  are  grouped  together.  The  third  level  of 
nesting  is  by  aspect.  For  any  component  at  a particular  kill 
level  the  cards  for  each  aspect  are  grouped  together.  The 
aspects  are  in  the  order:  bottom,  top,  left,  right,  front,  rear. 


The  innermost  level  of  nesting  is  by  fragment  mass  class.  Thus, 
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for  a particular  aspect  of  a particular  vulnerable  component 
at  a particular  kill  level,  there  must  be  one  vulnerable  area 
input  card  for  each  fragment  mass  class.  Each  individual  card 
contains  11  vulnerable  areas,  one  for  each  value  of  striking 

speed  from  0.0,  0.1,  0.2 >1 . 0 ■ VNETHI . The  units  are 

square  feet. 

The  vulnerable  area  data  is  read  into  the  FORTRAN  array 
VUL(I,J,K).  The  subscript  I denotes  kill  level.  The  subscript 
J denotes  striking  speed.  The  subscript  K is  a composite  com- 
bining aspect,  component  and  fragment  mass  class.  The  formula 
for  computing  K is : 

K = NWTS  • (6  • component  number  +aspect  number- 7)  4-mass  class  number. 

The  array  VUL  requires  core  storage  of  66 • NCOMPS • NWTS • NLEVS 
words.  Thus,  to  accommodate  25  components,  4 kill  levels  and 
10  mass  classes  requires  66,000  words  for  VUL  alone  and  thus 
demands  the  fulx  95.304  word  capacity  of  the  CDC  6600  computer 
system  at  NADC . Since  it  requires  a special  arrangement  to  be 
allowed  to  use  this  much  core,  it  is  normally  desirable  to 
restrict  the  number  of  components,  kill  levels  and/or  mass 
classes  in  order  to  reduce  the  storage  requirements  of  VUL. 

For  example,  the  listing  of  the  DSAMAM  program  in  Section  4 is 
for  a case  limited  to  12  components,  1 mass  class,  and  2 kill 
levels.  Thus,  VUL  requires  only  1,584  words  and  the  program 
can  be  run  using  less  than  40,000  words  of  core. 

I 
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2 . 6 Fragment  Densities 

The  static  explosion  fragment  density  data  is  read  in  from 
three  cards.  The  densities  are  in  fragments  per  steradian. 

o 

There  are  values  read  in  for  angles  of  0°,  10°,  20°,..., 180 
for  a total  of  19  entries  (8  on  each  of  the  first  two  cards 
and  three  on  the  third) . 

2 . 7 Fragment  Mass  Classes 

The  fraction  by  number  of  all  fragments  belonging  to  each 
mass  class  and  the  average  weight  of  each  class  are  read  in 
from  NWTS  cards . Each  card  contains  the  average  weight  in 
grains  of  the  fragments  in  one  class  and  the  fraction  by  num- 
ber of  all  fragments  in  that  class . 

2 . 8 Fuze  Parameters 

Tnere  is  one  card  used  to  read  in  various  constants  for  the 
radar  and  contact  fuzes.  This  card  contains  the  half-angle 
of  the  cone  of  the  radar  fuze,  the  maximum  range  of  the  radar 
fuze,  the  delay  time  of  the  radar  fuze,  the  dud  probability 
for  the  radar  fuze,  the  delay  time  of  the  contact  fuze,  and 
the  dud  probability  of  the  contact  fuze. 

2 . 9 Miscellaneous  Constants 

Finally,  four  miscellaneous  constants  are  read  in  on  one  data 
card.  These  are  the  normalizing  value  for  the  striking  speed 
argument  in  the  vulnerable  area  tables,  the  range  at  which  a 
miss  is  assumed  given  that  the  point  of  closest  approach  has 
been  passed,  the  fragment  drag  coefficient,  and  the  static 
emission  speed  of  the  fragments. 
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SECTION  3 
NEW  SSAMAM  OUTPUT 

The  following  pages  of  this  section  show  those  portions  of 
the  DSAMAM  output  which  differ  from  the  basic  DSAMAM  output 
due  to  the  endgame  addition. 

There  are  two  types  of  new  output  which  appear.  The  first 

is  simply  a listing  of  the  new  input  data.  This  listing  is 

complete  except  for  the  omission  of  the  vulnerable  area 
tables . The  second  output  type  is  the  "summary  of  kill" 
which  appears  at  the  time  of  missile  detonation.  The  summary 
includes : 

1.  Time  of  detonation  due  to  radar  fuze. 

2.  Range  from  missile  to  target  at  detonation. 

3.  Inertial  coordinates  of  missile  and  target 
at  detonation. 

4.  Coordinates  of  missile  in  aircraft  body  system. 

5.  Coordinates  of  aircraft  in  missile  body  system. 

6.  Probabilities  of  each  component  having  survived 
this  single  missile  at  all  kill  levels. 

7.  Probabilities  of  each  component  having  survived 
all  missiles  up  to  and  including  this  one  at 
all  kill  levels . 

S.  Probabilities  of  the  aircraft  having  been  killed 
by  this  single  missile  at  all  kill  levels. 

9.  Probabilities  of  the  aircraft  having  been  killed 
by  all  missiles  up  to  and  including  this  one  at 
all  kill  levels . 


I 


r.inito  tui.ATions 


- 13“" 


! 


© o 
it  vr> 


0 0 = 0 

.0  X Oj 


000  = 

2 x ir 


OOOOOCOOCOOO 
© *\j  fN  £ © X "■* 


U'  U~  U'  w 30  X — f- 


fv  II 
— II 


* 

o 


X. 

X 


© o -i  cj  c_  * »roeooo*'>*r'*r>*3eocowjoo 

■*  N*  O X 2 » •n/Nir^cOC'flOC^-^OOOOOoO 


•»—  ©X'T‘'4^C-CS*©.JOC.4>«^:'w(\}l\jfc.©«_>©c 

» — — » I III 

I 


w v u u o o u jooeoc.oowc.cooi’o©© 

■*>  *r  © x u ato*. 


■r*^j  « « IT  u © O ,\J  -J  •00©2X*r'*r*0  3 I © 

I I -*■'■'■'•  — — - .y  ,r  „•  J -T  J J I »-  -**»• 

I I I I I I I I I I I I I I I I 1 II 


— r 


O » 'M  "O  .?  U X ^ X X C 


: 40  11 

X u.  ►- 


3 2 2. 

C -5  l1 

>•  *-  «t 

C u.  i< 
Z < 

3 3 -J 


a ►; 

vi  3 

— ~ 

'-  U Z 

3 *- 


X.  4 

X .T  Z 


CO  (A 

u;  c 

OJ  2 

w£.  C 
'X  — O 
«l)  a.  Ul 
3 Uj  V 


X — 


c o o o © er  f\j  - 

• •*r*oc'*^o  • ©*- 

■\.  © © © © © zj  t * i. 

f<w  c o o o 3? 


n <1  •(  1 *i  11  !• 


a.  < 
< X 


< 

Z 2 


< X <1 


C »-  v_ 


«t 

J - - 


U - 


L 


a 


oj  i * "ns  in  s'in  ;uu  i ">-n  n n jo  jiiuivi 

‘IHJIIXS  JIXiOMHj  S..0  i(V  IIHll  XtffUJfid/S  *JJ  ‘0  JlIS  Ji  J IOJ  I i 


:i»u  i i i -null  j/v  uir*j  -Mi  i 


n,Jrur  on  f in  j 


■j#u  ii  j swvs  i i f -i'jvu  j/r  urvw  -’;in 


- 18  - 


O ^ 

4 • 

r o c 
> o c ^ 

IT  L*  O 


L.  C 

• © 

O -J  = 


— c:  — 

j:  — t 


*~  — *■ 

n -r  ^ 

io  « s.  r 

j r> 

x — » 


I 


- 19  - 


< 

O 

a 

o 

d 

© 

o 

° « 

_4 

o 

o 

o 

© 

© 

o 

<3 

a 

O 

© 

cd  ^jy 

U 

• 

• 

• 

c 

• 

• 

• 91 

• 

O 

o 

1 

© 

° D V$ 

Urt 

K. 

C3> 

o 

UJ 

o 

© 

© « 

— / 

O 

O 

CD 

-J 

© 

o 

CD  fl| 

mJ 

o 

O 

© 

© 91 

• 

• 

• 

Zj 

• 

• 

•* 

a 

“3 

© 

© 

© f 

1 

- 

< 

o 

o 

O 

<3 

o 

O V 

«x 

o 

*3 

O 

it 

e 

CD 

O •i  i 

£ 

• 

• 

• 

c 

• 

• 

• 

3. 

c 

o 

£ 

1 

'© 

r 

X 

d 

-j 

-J 

aj 

o 

o 

o 

•U 

X 

X 

3 

«r 

e* 

d 

X 

© 

£i 

• 

• 

• 

£ 

• 

• 

• 

C. 

o 

33 

cr 

Po 

CD 

r 

»r* 

r 

J 

© 

1 1 

<x 

vC 

< 

® 

Ps» 

o 

y r 

x © 

£ 

o 

3 

O 

£ x 

pj 

X 

X 

- £ 

• 

• 

• 

-J  CT- 

i- 

• 

• 

o • 

O 

_r> 

ZS 

O • 

o 

£ 

c 

© 

w 

N. 

£. 

«o 

fO 

•rt 

J •*» 

U. 

-T 

O -J 

X 

-7 

•r 

d • 

(M 

CN. 

< • 

r\i 

art 

r © 

o 

r © 

© 

> o 

C J- 

> o 

o ^ 

4 

IT 

(J  © 

• 

• 

• 

4.% 

u*  © 

• 

• 

• 

• 

- J 

-0 

CP 

P, 

•a 

mJ 

— « 

-J 

£ 

o 

•o 

Xl 

or 

-7 

X 

X 

IX' 

X. 

o 

©■ 

X 

. £ 

w* 

-J  cr 

vi 

art 

CD 

J>  Po 

© 

c:  p. 

X • 

• 

N • 

• 

> © 

X 

PSj 

•n 

o 

> O 

£ 

nC 

X 

Pj 

u 

* 

x. 

o 

(_> 

X 

X 

X 

d 

• 

• 

• 

d 

• 

• 

• 

X 

c. 

r 

art 

• 

• 

C — 

o — 

«c  «r 

o 

d 

ar 

P. 

© 

O'  7 

'J 

• 

• 

• 

or  n 

• 

• 

• 

e- 

• 

d 

© 

O 

• 

c ^ 

< 

© 

X 

£ 

o 

>■  CJ 

J 

o 

rx 

»- 

>*  c 

£ 

m- 

IT 

•-j 

o 

d* 

> 

o 

£. 

■> 

> 

T 

• 

X 

o 

Pw 

w 

— 

r 

— 

-T 

• 

vi 

• 

- 

*-  -7 

<T 

o 

X 

«r 

X 

U.  © 

• 

• 

• 

LL.  © 

• 

• 

a 

II 

l 

• 

n 

«• 

cr 

1 

• 

►—  © 

X 

UT> 

£ 

v» 

© 

-j  © 

■> 

n 

vD 

o 

-J  O 

> 

© 

X 

'U 

-3 

■*  © 

dt 

j- 

•J 

X © 

T 

* 

Pi 

r 

d 

> o 

-t 

> u> 

•— 

-J 

-J 

-J 

a 

— o 

© 

a.  © 

© 

© 

c 

< 

•» 

C 

• 

• 

• 

O •»; 

• 

• 

• 

•— 

• 

.•i  • 

>- 

1 

i 

C 

■a 

• 

V • 

X 

1 

i 

• 

C.' 

/3 

£ 

> 

© 

n 

u> 

£ 

-> 

r 

w ** 

•— 

“ 

r 

2 

c 

d w 

• 

d 

s> 

r © 

© 

l/i 

7 J' 

S 

j.  Pj 

Ct  -1 

a-  • 

IT 

o 

T 

»—  • 

X 

Pw 

■.*1  -r 

*-  CD 

• 

• 

• 

II 

kl  J 

— © 

• 

• 

• 

s £ 

o • 

X 

Cv. 

■3 

ec 

£ cr 

o • 

X 

a - 

x- 

in 

•* 

it  .? 

i£ 

> 

uo 

X. 

l 

mJ 

r4 

U.  -7 

> 

X 

art 

X 

*- 

£ lT> 

> 

a 

cc 

r 

p- 

X if* 

> 

w 

a- 

X 

CD 

•-< 

•—4 

•— 

-j 

c- 

k- 

art 

art 

• 

v« 

u. 

• 

• 

1 

art 

• 

1 

» 

* 

a. 

o 

ct 

© 

x e 

►-  © 

•— 

►- 

X © 

►-  © 

1 1 

• 

in. 

•n 

a » 

£ • 

• 

• 

• 

<r 

P. 

rtO 

O'  © 

£ , 

• 

• 

• 

c 

ifk 

U4 

O 3 

— 

c 

k 

c © 

,£ 

iT. 

a> 

*_ 

w '-3 

d 

p- 

U ■ 

£ 

o ■> 

d 

X 

P- 

£ 

• 

IT  © 

•0 

J 

u 

1 

a o 

X 

•r» 

>■ 

n 

c • 

•* 

X' 

L* 

£ • 

j 

c. 

\x 

u •" 

*- 

£ 

c 

d 

•,£ 

u. 

c 

aD 

n 

£ w 

-1 

wT 

C.  C. 

» 

u 

o 

•—  • 

o 

U. 

© 

• 

— i 

• 

£ 

• 

• 

• 

> 

-1 

• 

£ Cj 

• 

• 

• 

w 

X 

c 

£ 

O' 

3 

© 

-J 

£. 

<_ 

-J 

1— 

© 

© 

X 

d 

► 

< 

£ 

1 

< 

V 

< 

> 

d 

£ 

1 

i 

*T 

►— 

JL 

d £ 

x >- 

f 

<r 

M 

d £ 

£ >■ 

• 

21  Pj 

*- 

or 

X P- 

s 

< 

£ • 

£ 

z 

d 

«x  • 

£ 

£ 

> 

w j _.*> 

d © 

c 

— 

> 

-j  *r 

d © 

£ 

C 

< 

►-  • 

© 

X 

• 

■3 

■» 

£ © 

•iJ 

Ik 

3 

w> 

£ © 

U 

mJ 

© 

C 

_J 

• 

• 

• 

_ 

"T 

u. 

£ 

• 

• 

• 

• 

d 

<5 

— 

* 

© 

• 

d 

d 

•_> 

X 

r. 

in 

© 

O 

- 3 

fc** 

J 

t* 

JC 

X 

f\- 

j- 

<44 

1 1 

a» 

U 

• 

✓>  X 

X 

CZ 

r <* 

— 

3 

• 

✓I  x 

*\ 

a 

X 

>— 

a. 

X 

r . 

M 

u 

— 

mL 

X 

X o 

M 

X 

n* 

1 

X 

— 

x T 

r - 

£ 

V 

1 

2 

— • 

X £ 

e jt 

X a 

X 

— 

l 

• 

M 

<3 

t v' 

s • 

■j  • 

1 

|i 

r* 

c * 

£ • 

1 

• 

£ 

X 

iS  cr 

• 

»— 

14 

r 

r 

'J  3 

• 

• 

r 

»- 

d 

o 

rw 

N; 

. ) 

r 

«- 

<■ 

c 

•- 

Pj 

• 

• 

£ 

*3 

l 

£ 

• 

- 

. 1 

J 

I 


I 


MU.  Ill/ll  I Kill  U Ut  L 

AIPf.FAM  MM'PJir  AllCPAFf  AIPCPAFT 

‘vinr.u-jHoi  iumiilat  i w siM.it-snoi  cuhuiative 

KILL  Kill  Kill  Kill 

( pnilA'i  I L I T y I’hOflACIlI  IV  I’kO'IA  il  I L I I v I’linAHI  Illy 


- 23  - 


< o 

_j  «"> 
v,'  e 

o • 

I 


-J  If' 

a S' 


< o 
O • 


t-j 

«s  ° 

x x 

r — 

< N 


C S- 
Z2  <S/ 


W c> 
r •» 
-*  r 

o • 


u.  ^ 

'JC  X) 
a ^ 


r o 
> o 
»r 


c * 

UJ  o 


- r 

o *•. 


X IT  — 


D <r 
a.  t 
X L.*> 


Kj  C3 

a s> 


x .r 

~tr  ^ 
ir 


4 • w 


<1  -? 
r •*. 

> T 


< C- 

X n 

c 


x = 

c n 


u 

.-i 

»/* 

X 


t «y 


*-  if 
u.  ■=> 
•-<  o 


u> 

O O 
«t  ac 
X a' 
£t  — 


**  £J 

Jf  o 


(/»  .?  *-  o 

X CT  O • 

q:  j o 

XU-  > 


W “3 
J.  o 

C • 


«=  T 
X 'Ni 


X X 
^ J1 


— O 

5 o 


x o 

c • 

U C-' 


000*-  DC0*0l-30  * oq*«ilP/  I * *if  <!J  ‘(lit  2/*l  I’ISBl  Z'/JK,  0‘  »‘ZbSl-  - f,!» »» *J  *0  ")U*)I-  S 

imo  ?n?a  vwou'mi  .ivn j u v i ioui  ijt.i  hjvm  ‘j/wa  za  aa  aa  z a > *uu 


..(IHMAiit  Of  f I l L cue  li)  MI'-.ILE  ru. 


24 


25 


SECTION  4 
PROGRAM  LISTINGS 


The  following  pages  of  this  section  are  the  FORTRAN  program 
listings  for  those  portions  of  the  DSAMAK  program  which  have 
been  modified  for  the  endgame.  This  includes  the  main  pro- 
gram, subroutine  MISSILE,  and  the  following  new  subroutines: 
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SECTION  5 

DEFINITION  OF  FORTRAN  VARIABLES 


The  following  pages  of  this  section  list  and  define  those 
FORTRAN  variables  which  have  been  added  to  the  DSAMAM  pro- 
gram for  the  endgame.  Also  shown  is  the  common  block  in 
which  the  variable  is  found  or,  if  it  is  not  in  common,  the 
subroutine  which  uses  it.  Finally,  there  is  an  indication 
at  to  whether  the  value  of  the  variable  is  read  as  input  or 
computed  internally. 


i 


FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
or  Subroutine 
Where  Found 

Definition 

ABL(I) 

Input 

/TWO/ 

For  the  Ith  blast  ellipsoid, 
the  length  of  the  semi-axis 
in  the  X-direction  of  the 
aircraft  body  system  (ft) 

ASH(I) 

Input 

/TWO/ 

For  the  Ith  fragment  shield 
ellipsoid,  the  length  of 
the  semi-axis  in  the  X- 
direction  of  the  aircraft 
body  system  (ft) 

BBL(I) 

Input 

/TWO/ 

For  the  Ith  blast  ellipsoid, 
the  length  of  the  semi-axis 
in  the  Y-direction  of  the 
aircraft  body  system  (ft) 

BETAX 

Internal 

SPRAY 

Direction  cosine  with  re- 
spect to  the  X-axis  of  the 
aircraft  body  system  of  the 
line  traversed  by  the 
fragment 

BETAY 

Internal 

SPRAY 

Direction  cosine  with  re- 
spect to  the  Y-axis  of  the 
aircraft  body  system  of  the 
line  traversed  by  the 
fragment 

BETAZ 

Internal 

SPRAY 

Direction  cosine  with  re- 
spect to  the  Z-axis  of  the 
aircraft  body  system  of 
the  line  traversed  by  the 
fragment 

BSH(I) 

Input 

/TWO/ 

For  the  Ith  fragment  shield 
ellipsoid,  the  length  of  the 
semi-axis  in  the  Y-direction 
of  the  aircraft  bodv  system 
(ft) 

CBL(I) 

Input 

/TWO/ 

For  the  Ith  blast  ellipsoid, 
the  length  of  the  semi-axis 
in  the  Z-direction  of  the 
aircraft  body  system  (ft) 

CDR 

Input 

/THREE/ 

Fragment  drag  coefficient 
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FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
or  Subroutine 
Where  Found 

Definition 

COSGAM 

Internal 

SPRAY 

Cosine  of  the  angle  between 
the  missile  velocity  and 
the  velocity  vector  of  the 
fragment  in  a dynamic 
explosion 

COSTHT 

Internal 

SPRAY 

Cosine  of  the  angle  between 
the  missile  velocity  vector 
and  the  velocity  vector  of 
the  fragment  in  a static 
explosion 

CPS (I, J) 

Internal 

/SIX/ 

Cumulative  survival  pro- 
bability for  component  J 
at  kill  level  I 

CPKAC(I) 

Internal 

MISSIL 

Cumulative  overall  aircraft 
kill  probability  at  kill 
level  I 

CPST (I , J) 

Internal 

MISSIL 

Cumulative  survival  pro- 
bability for  component  J 
at  kill  level  I adjusted 
for  doubly  vulnerable 
pairs  in  order  to  calculate 
overall  aircraft  kill  pro- 
bability 

CSH(I) 

Input 

/TWO/ 

For  the  Ith  fragment  shield 
ellipsoid,  the  length  of  the 
semi-axis  in  the  Z-direction 
of  the  aircraft  body  system 
(fc) 

DELT 

Internal 

/ONE/ 

That  fraction  of  the  time 
increment  between  two  inte- 
gration points  at  which 
radar  fuzing  occurs 

DTCF 

Input 

/THREE/ 

Delay  time  of  the  contact 
fuze  (sec.) 

DTRF 

Input 

/THREE/ 

Delay  time  of  the  radar 
fuze  (sec.) 

EL 

Internal 

SPRAY 

The  distance  traveled  by 
a fragment  before  hitting 
an  aircraft  component  (ft) 
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FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
or  Subroutine 
Where  Found 

Definition 

ELDOT 

Internal 

SPRAY 

Rate  of  change  of  EL  with 
respect  to  time  (ft/sec). 

EX(I) 

Input 

/TWO/ 

X-coordinate  in  the  aircraft 
body  system  of  the  center 
of  gravity  of  the  Ith  vul- 
nerable component  (ft). 

F 

Internal 

SPRAY 

A function  of  time  whose 
roots  represent  solutions 
for  the  intersection  of 
the  fragment  and  an  air- 
craft component. 

FPRIHE 

Internal 

SPRAY 

The  rate  of  change  of  F 
with  respect  to  time. 

FRACT(I) 

Input 

/FIVE/ 

Fraction  by  number  of  all 
fragments  belonging  to 
fragment  mass  class  I. 

HAFANG 

Input 

/THREE/ 

Half-angle  of  the  radar 
fuze  (degrees) . 

HEADl(I) 

Internal 

MISSIL 

Printout  heading.  I has 
a maximum  value  of  3. 

HEAD2 (I) 

Internal 

MISSIL 

Printout  heading.  I has 
a maximum  value  of  3. 

HEAD3 (I) 

Internal 

MISSIL 

Printout  heading.  I has 
a maximum  value  of  3. 

HEAD4 ( I ) 

Internal 

MISSIL 

Printout  heading.  I has 
a maximum  value  of  3. 

HEAD  5 (I) 

Internal 

MISSIL 

Printout  heading.  I has 
a maximum  value  of  3. 

HEAD6 (I) 

Internal 

MISSIL 

Printout  heading.  I has 
a maximum  value  of  3. 

I 

Internal 

/ONE/ 

Index  which  points  to  the 
particular  missile  in  the 
air  being  considered.  This 
variable  is  also  used  as  a 
temporary  index  in  other 
parts  of  the  program  which 
do  not  relate  to  the  endgame 

FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
of  Subroutine 
Where  Found 

Definition 

KIEV (I, J) 

Internal 

MISSIL 

Printout  heading  which 
designates  kill  level  J. 

I has  a maximum  value  of  2. 

NBLAST 

Input 

/ONE/ 

Number  of  blast  ellipsoids. 

N COMPS 

Input 

/ONE/ 

Number  of  vulnerable  com- 
ponents (including  doubly 
vulnerable  components). 

NDHK 

Input 

/THREE/ 

Number  of  direct-hit-with- 
kill  ellipsoids. 

NDHNK 

Input 

/THREE/ 

Number  of  direct-hit-no- 
kill ellipsoids. 

NDUBLY 

Input 

/THREE/ 

Number  of  pairs  of  doubly 
vulnerable  components. 

NGLIT 

Input 

/ONE/ 

Number  of  glitter  points. 

NLEVS 

Input 

/ONE/ 

Number  of  kill  levels. 

NSHLDS 

Input 

/ONE/ 

Number  of  shield  ellipsoids 

NWTS 

Input 

/ONE/ 

Number  of  fragment  mass 
classes . 

PDCF 

Input 

/THREE/ 

Probability  that  the  con- 
tact fuze  is  a dud. 

PDRF 

Input 

/THREE/ 

Probability  that  the  radar 
fuze  is  a dud. 

PKAC(I) 

Internal 

MISSIL 

Single-shot  overall  air- 
craft kill  probability  at 
kill  level  I. 

PS(I.J) 

Internal 

MISSIL 

Single-shot  survival  pro- 
bability for  component  J 
at  kill  level  I. 

PSCF(I.J) 

Internal 

MISSIL 

Single-shot  survival  pro- 

bability  for  component  J 
at  kill  level  I due  to 
detonation  initiated  by 
contact  fuze. 


r 


61 


I 


FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
of  Subroutine 
Where  Found 

Definition 

PSRF (I , J) 

Internal 

MISSIL 

Single-shot  survival  pro- 
bability for  component  J 
at  kill  level  I due  to 
detonation  initiated  by 
radar  fuze. 

RAD FUZE 

Internal 

MISSIL 

Indicator  set  to  .TRUE, 
if  radar  fuze  is  activated 
otherwise  .FALSE. 

RCHA 

Internal 

/ONE/ 

Maximum  range  of  the  radar 
fuze  multiplied  by  the 
cosine  of  the  radar  fuze 
half-angle  (ft). 

RMISS 

Input 

/THREE/ 

Range  outside  of  which 
the  missile  is  considered 
to  have  missed  after 
having  passed  the  point 
of  closest  approach  to 
the  target  (ft) . 

SDOWN 

Internal 

SPRAY 

The  fraction  of  its  ini- 
tial velocity  to  which  a 
fragment  slows  down  after 
traveling  a distance  EL. 

SLOW (I) 

Internal 

/FIVE/ 

Slowdown  constant  for 
fragments  of  mass  class  I 
(ff1). 

SPREAD 

Internal 

SPRAY 

Factor  which  when  multi- 
plied by  the  dynamic  frag- 
ment density  gives  the 
fragment  density  for  a 
static  explosion. 

STEAR(I) 

Input 

/FIVE/ 

Static  fragment  density 
(fragments/steradian) . 

The  index  I represents 

19  points  from  0°  to 

180“  off  the  nose  at  10° 
intervals . 

SUM (I) 

Internal 

SPRAY 

Expected  number  of  hits 
capable  of  producing  kill 
level  I on  a component. 

I 


A 
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FORTRAN 

Variable 

TAM ( I ) 


Input  or 
Internal 

Internal 


Common  Block 
of  Subroutine 
Where  Found 

/TWO/ 


Internal 


/ONE/ 


THETA 


Internal  SPRAY 


TIA(I) 


Internal  /AIRCF/ 


TMI(I) 


Internal 


/TWO/ 


Input 


/THREE/ 


VHIT 


Internal  SPRAY 


Definition 

Transformation  matrix  be- 
tween the  aircraft  body 
coordinate  system  and  the 
missile  body  coordinate 
system.  The  index  I runs 
from  1 to  9 starting  at 
the  upper  left  of  the 
matrix  and  proceeding  left 
to  right  across  the  three 
rows  of  the  matrix. 

Tangent  of  the  radar  fuze 
half-angle . 

Angle  between  the  missile 
velocity  vector  and  the 
fragment  velocity  vector 
in  a static  explosion 
(radians) . 

Transformation  matrix  be- 
tween the  aircraft  body 
coordinate  system  and 
the  inertial  coordinate 
system.  The  index  I runs 
from  1 to  9 starting  at 
the  upper  left  of  the 
matrix  and  proceeding 
left  to  right  across  the 
three  rows  of  the  matrix. 

Transformation  matrix  be- 
tween the  missile  body 
coordinate  system  and  the 
inertial  coordinate  system. 
The  index  I runs  from  1 to 
9 starting  at  the  upper  left 
of  the  matrix  and  proceeding 
left  to  right  across  the 
three  rows  of  the  matrix. 

Fragment  static  emission 
speed  (f t / sec) . 

The  speed  of  the  striking 
fragment  (ft/sec). 


i 


FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
of  Subroutine 
Where  Found 

Definition 

VNET 

Internal 

SPRAY 

The  net  striking  speed  of 
the  fragment  (i.e.,  the 
magnitude  of  the  relative 
velocity  vector  between 
the  fragment  and  the  air- 
craft) (ft/sec). 

VNETHI 

Input 

/ONE/ 

Normalizing  velocity  for 
vulnerable  area  inputs. 
Values  are  read  for  each 
of  the  11  net  striking 
velocities  corresponding 

to  0,  0.1,  0.2 1.0 

times  VNETHI  (ft/sec). 

VODOT 

Internal 

SPRAY 

Rate  of  change  of  VZERO 
with  respect  to  time 
(f t/ sec^)  . 

VS(I) 

Internal 

SPRAY 

Missile  velocity  vector 
in  the  aircraft  body 
system  (ft/ sec) . 

VT  (I) 

Internal 

SPRAY 

Aircraft  velocity  vector 
in  the  aircraft  body 
system  (ft/ sec) . 

VUL ( I , J , K ) 

Input 

/FIVE/ 

Vulnerable  area  (ft2). 

The  index  I represents 
kill  level.  The  index  J 
represents  11  levels  of 
net  striking  speed.  The 
index  K combines  aspect , 
fragment  mass  class,  and 
component . 

VX 

Internal 

MISSIL 

X-component  in  the  iner- 
tial coordinate  system 
of  the  relative  velocity 
vector  of  the  aircraft 
with  respect  to  the  mis- 
sile (ft/sec). 
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FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
of  Subroutine 
Where  Found 

Definition 

VY 

Internal 

MISSIL 

Y-component  in  the  inertial 
coordinate  system  of  the 
relative  velocity  vector 
of  the  aircraft  with  re- 
spect to  the  missile 
(ft/ sec) . 

vz 

Internal 

MISSIL 

Z-component  in  the  iner- 
tial coordinate  system 
of  the  relative  velocity 
vector  of  the  aircraft 
with  respect  to  the 
missile  (ft/ sec) . 

VZERO 

Internal 

SPRAY 

Magnitude  of  the  dynamic 
velocity  vector  of  the 
fragment  (ft/sec). 

WATE(I) 

Input 

/FOUR/ 

Average  weight  of  frag- 
ments in  mass  class  I 
(grains) . 

WY(I) 

Input 

/TWO/ 

Y-coordinate  in  the  air- 
craft body  system  of  the 
center  of  gravity  of  the 

Ith  vulnerable  component 
(ft.). 

XBL(I) 

Input 

/TWO/ 

X-coordinate  in  the  air- 
craft body  system  of  the 
center  of  the  Ith  blast 
ellipsoid  (ft.). 

XCG 

Internal 

MISSIL 

X-coordinate  in  the  iner- 
tial system  of  the  center 
of  gravity  of  the  aircraft 
relative  to  the  missile 
(ft.). 

XCM 

Internal 

/ONE/ 

X-coordinate  in  the  air- 
craft body  system  of  the 
missile  currently  being 
considered  (ft.). 

XCMOLD ( I ) 

Internal 

/TWO/ 

X-coordinate  in  the  air- 

craft  body  system  of  mis- 
sile I at  the  previous 
time  step  (ft.)- 
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FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
of  Subroutine 
Where  Found 

Definition 

XG(I) 

Internal 

CONFUZE 

X-coordinate  in  the  missile 
body  system  of  the  glitter 
point.  The  index  I is  1 
for  the  previous  time  pulse 
and  2 for  the  current  time 
pulse . 

XGL(I) 

Input 

/TWO/ 

X-coordinate  in  the  air- 
craft body  system  of  the 

Ith  glitter  point  (ft.). 

XO(I,J) 

Input 

/FOUR/ 

X-coordinate  in  the  air- 
craft body  system  of  the 
center  of  the  Ith  direct- 
hit  ellipsoid  of  type  J 
(ft.).  The  type,  J, 
specifies  direct-hit- 
without  kill  (J=l)  or 
direct -hi t-with-kill 
(j=2). 

XS(I, J) 

Input 

/FOUR/ 

For  the  Ith  direct-hit 
ellipsoid  of  type  J,  the 
length  of  the  semi-axis 
in  the  X-direction  of  the 
aircraft  body  system  (ft.). 
The  type,  J,  specifies 
direct -hit -without -kill 
(J=l)  or  direct-hit-with- 
kill  (J=2) . 

XSH(I) 

Input 

/TWO/ 

X-coordinate  in  the  air- 
craft body  system  of  the 
center  of  the  Ith  frag- 
ment shield  ellipsoid 
(ft.). 

XSTAR 

Internal 

SPRAY 

X-coordinate  in  the  air- 
craft body  system  of  the 
explosion  point  (ft.). 

YBL(I) 

Input 

/TWO/ 

Y-coordinate  in  the  air- 

craft  body  system  of  the 
center  of  the  Ith  blast 
ellipsoid  (f t . ) . 


i 
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FORTRAN 

Variable 

Input  or 
Internal 

Common  Block 
of  Subroutine 
Where  Found 

Def inition 

YCG 

Internal 

MISSIL 

Y-coordinate  in  the  iner- 
tial system  of  the  center 
of  gravity  of  the  aircraft 
relative  to  the  missile 
(ft.). 

YCM 

Internal 

/ONE/ 

Y-coordinate  in  the  air- 
craft body  system  of  the 
missile  currently  being 
considered  (f t . ) . 

YCMOLD (I) 

Internal 

/TWO/ 

Y-coordinate  in  the  air- 
craft body  system  of  mis- 
sile I at  the  previous 
time  step  (f t . ) . 

YG  (I) 

Internal 

CONFUZE 

Y-cocrdinate  in  the  mis- 
sile body  system  of  the 
glitter  point.  The  index 

I is  1 for  the  previous 
time  pulse  and  2 for  the 
current  time  pulse. 

YGL(I) 

Input 

/TWO/ 

Y-coordinate  in  the  air- 
craft body  system  of  the 
Ith  glitter  point  (ft.). 

YO (I , J) 

Input 

/FOUR/ 

Y-coordinate  in  the  air- 
craft body  system  of  the 
center  of  the  Ith  direct- 
hit  ellipsoid  of  type  J 
(ft.).  The  type,  J,  spe- 
cifies direct-hit-without- 
kill  (J=l)  or  direct-hit- 
with-kill  (J=2) . 

YS(I,J) 

Input 

/FOUR/ 

For  the  Ith  direct-hit 

ellipsoid  of  type  J,  the 
length  of  the  semi-axis 
in  the  Y-direction  of  the 
aircraft  body  system  (ft.). 
The  type,  J,  specifies 
direct -hit -without -kill 
(J*l)  or  direct-hit-with- 
kill  (J-2). 
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FORTRAN 

Variable 

Input  or 
Internal 

Common  Elock 
of  Subroutine 
Where  Found 

Definition 

YSH(I) 

Input 

/TWO/ 

Y-coordinate  in  the  air- 
craft body  system  of  the 
center  of  the  Ith  frag- 
ment shield  ellipsoid  (ft.) 

YSTAR 

Internal 

SPRAY 

Y-coordinate  in  the  air- 
craft body  system  of  the 
explosion  point  (ft.). 

ZBL(I) 

Input 

/TWO/ 

Z-coordinate  in  the  air- 
craft body  system  of  the 
center  of  the  Ith  blast 
ellipsoid  (ft . ) . 

ZCG 

Internal 

MISSIL 

Z-coordinate  in  the  iner- 
tial system  of  the  center 
of  gravity  of  the  aircraft 
relative  to  the  missile 
(ft.). 

ZCM 

Internal 

/ONE/ 

Z-coordinate  in  the  air- 
craft body  system  of  the 
missile  currently  being 
considered  (f t . ) . 

ZCMOLD (I) 

Internal 

/TWO/ 

Z-coordinate  in  the  air- 
craft body  system  of  mis- 
sile I at  the  previous 
time  step. 

ZEE (I) 

Input 

/TWO/ 

Z-coordinate  in  the  air- 
craft body  system  of  the 
center  of  gravity  of  the 

Ith  vulnerable  component 
(ft.). 

ZG(I) 

Internal 

CONFUZE 

Z-coordinate  in  the  mis- 
sile body  system  of  the 
glitter  point.  The  index 

I is  1 for  the  previous 
time  pulse  and  2 for  the 
current  time  pulse. 

ZGL(I) 

Input 

/TWO/ 

Z-coordinate  in  the  air- 
craft body  system  of  the 

Ith  glitter  point  (ft.). 

i 


FORTRAN 

Variable 

ZO(I,J) 


ZS(I,J) 


ZSH(I) 


- 68  - 


Common  Block 
Input  or  of  Subroutine 
Internal  Where  Found  Definition 


Input  /'FOUR/  Z-coordinate  in  the  air- 

craft body  system  of  the 
center  of  the  Ith  direct- 
hit  ellipsoid  of  type  J 
(ft.).  The  type,  J,  spe- 
cifies direct-hit-without- 
kill  (J=l)  or  direct-hit- 
with-kill  (J=2) . 

Input  /FOUR/  For  the  Ith  direct-hit 

ellipsoid  of  type  J,  the 
length  of  the  semi-axis 
in  the  Z-direction  of  the 
aircraft  body  system  (ft.). 
The  type,  J,  specifies 
direct -hit -without -kill 
(J=l)  or  direct-hit-with- 
kill  (J=2)  . 

Input  /TWO/  Z-coordinate  in  the  air- 

craft body  system  of  the 
center  of  the  Ith  frag- 
ment shield  ellipsoid 
(ft.). 


ZSTAR 


Internal  SPRAY 


Z-coordinate  in  the  air- 
craft body  system  of  the 
explosion  point  (ft.). 


